home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / em7sui_1 / em7sui~1.exe / ProdBDrillDownB.wr_ / ProdBDrillDownB.wr
Text File  |  1998-11-10  |  7KB  |  338 lines
  1. #VRML V2.0 utf8
  2.  
  3. EXTERNPROTO GridGray [ exposedField SFFloat transparency ] "..\Appearances\MetalMaterials.wrl#color26"
  4.  
  5. EXTERNPROTO SurfaceColor [ exposedField SFFloat transparency ] "..\Appearances\SoftMaterials.wrl#color18"
  6.  
  7. EXTERNPROTO Red [ exposedField SFFloat transparency ] "..\Appearances\SummerMaterials.wrl#color2"
  8. EXTERNPROTO Blue [ exposedField SFFloat transparency ] "..\Appearances\SummerMaterials.wrl#color19"
  9.  
  10. EXTERNPROTO em7_ChartGrid [
  11.     exposedField SFNode appearance
  12.     exposedField SFColor lineColor
  13.     field SFInt32 xDimension
  14.     field SFFloat xSpacing
  15.     field SFInt32 yDimension
  16.     field SFFloat ySpacing
  17.     field SFInt32 zDimension
  18.     field SFFloat zSpacing
  19.     field SFFloat thickness
  20.     eventIn SFInt32 set_xDimension 
  21.     eventIn SFFloat set_xSpacing 
  22.     eventIn SFInt32 set_yDimension 
  23.     eventIn SFFloat set_ySpacing 
  24.     eventIn SFInt32 set_zDimension 
  25.     eventIn SFFloat set_zSpacing 
  26.     eventIn SFFloat set_thickness
  27. ] "..\VR_GRAPH.wrl#em7_ChartGrid"
  28.                 
  29. EXTERNPROTO em7_Legend [
  30.     field MFNode appearances
  31.     field MFString descriptions
  32.     field SFString keyStyle 
  33.     field SFFloat textHeight
  34.     field SFFloat textGap
  35.     field SFColor textColor
  36.     eventIn MFNode set_appearances
  37.     eventIn MFString set_descriptions
  38. ] "..\VR_GRAPH.wrl#em7_Legend"
  39.  
  40. EXTERNPROTO em7_RoundedRibbonSeries [
  41.     exposedField SFNode appearance
  42.     field SFInt32 xDimension
  43.     field SFFloat xSpacing
  44.     field SFFloat thickness
  45.     field SFFloat depth
  46.     field MFFloat height
  47.     field SFFloat bevelRadius
  48.     field SFFloat creaseAngle
  49.     eventIn SFInt32 set_xDimension
  50.     eventIn SFFloat set_xSpacing
  51.     eventIn SFFloat set_thickness
  52.     eventIn SFFloat set_depth
  53.     eventIn MFFloat set_height
  54. ] "..\VR_GRAPH.wrl#em7_RoundedRibbonSeries"
  55.  
  56. EXTERNPROTO em7_RoundedColumnSeries [
  57.     field MFNode appearance
  58.     field SFInt32 xDimension
  59.     field SFFloat xSpacing
  60.     field SFFloat width
  61.     field SFFloat depth
  62.     field MFFloat height
  63.     field MFFloat floor
  64.     field SFFloat bevelRadius
  65.     field SFFloat creaseAngle
  66.     eventIn SFInt32 set_xDimension
  67.     eventIn SFFloat set_xSpacing
  68.     eventIn SFFloat set_width
  69.     eventIn SFFloat set_depth
  70.     eventIn MFFloat set_height
  71.     eventIn MFFloat set_floor
  72.     eventIn MFNode set_appearance
  73. ] "..\VR_GRAPH.wrl#em7_RoundedColumnSeries"
  74.  
  75. EXTERNPROTO em7_LookAt [
  76.     field SFVec3f viewerPos
  77.     field SFVec3f viewedPos
  78.     field SFBool enabled
  79.     eventIn SFVec3f set_viewerPos
  80.     eventIn SFVec3f set_viewedPos
  81.     eventIn SFBool set_enabled
  82.     eventOut SFRotation orientation_changed
  83. ] "..\VR_NAV.wrl#em7_LookAt"
  84.  
  85. EXTERNPROTO em7_TextList [
  86.     exposedField SFNode appearance
  87.     field MFString string
  88.     field SFFloat textHeight
  89.     field SFFloat textGap
  90.     field SFInt32 visibleCount
  91.     field SFInt32 topIndex
  92.     exposedField MFFloat length
  93.     exposedField SFFloat maxExtent
  94.     field SFString family
  95.     field SFString style
  96.     field MFString justify
  97.     field SFBool horizontal
  98.     field SFBool leftToRight
  99.     field SFBool topToBottom
  100.     field SFString language
  101.     eventIn MFString set_string
  102.     eventIn MFString addStrings
  103.     eventIn SFInt32 set_visibleCount
  104.     eventIn SFInt32 set_topIndex
  105.     eventOut MFString visibleText_changed
  106.     eventOut SFInt32 topIndex_changed
  107.     eventOut SFInt32 listRange_changed
  108. ] "..\VR_UI.wrl#em7_TextList"
  109.  
  110. EXTERNPROTO em7_PopupStrip [
  111.     field SFInt32 xDimension
  112.     field SFFloat xSpacing
  113.     field SFFloat radius
  114.     field SFFloat depth
  115.     field MFFloat height
  116.     field SFColor color
  117.     field SFFloat transparency
  118.     field SFString defaultPopupText
  119.     field SFFloat popupHeight
  120.     field SFString allignment
  121.     field MFString popupText
  122.     exposedField SFColor textColor
  123.     exposedField SFColor backgroundColor
  124.     exposedField SFColor borderColor
  125.     exposedField SFBool touchEnabled
  126.     eventIn MFString set_popupText
  127.     eventIn MFFloat set_height
  128.     eventOut SFInt32 mouseOverIndex
  129.     eventOut SFInt32 mouseClickedIndex
  130. ] "..\VR_GRAPH.wrl#em7_PopupStrip"
  131.  
  132.  
  133. NavigationInfo {
  134.     headlight FALSE
  135. }
  136.  
  137. Background {
  138.     skyColor [
  139.         0 0 0
  140.         0.4 0.4 0.6
  141.         1 1 1
  142.     ]
  143.     skyAngle [2, 3]
  144. }
  145.  
  146. # the viewpoint and the look at functionality
  147.  
  148. DEF VIEW Viewpoint {
  149.     position 13.5 14 20
  150. }
  151.  
  152. DEF LOOKAT em7_LookAt {
  153.     viewerPos 13.5 14 20
  154.     viewedPos 7 2 0
  155. }
  156.  
  157. # the chart casing
  158.  
  159. em7_ChartGrid {
  160.     appearance GridGray { }
  161.         lineColor 0.3 0.3 0.3
  162.     xDimension 6
  163.     xSpacing 3
  164.     yDimension 8
  165.     ySpacing 1
  166.     zDimension 2
  167.     zSpacing 4
  168.     thickness 0.15
  169. }
  170.  
  171. # the columns
  172. Transform {
  173.     translation 1 0 1.6
  174.     children [
  175.         em7_RoundedColumnSeries {
  176.             appearance Red { }
  177.             xDimension 5
  178.             xSpacing 3
  179.             width 0.4
  180.             depth 0.8
  181.             height [1.757, 0.608, 1.344, 1.884, 3.15 ]
  182.         }
  183.     ]
  184. }
  185.  
  186. Transform {
  187.     translation 1.6 0 1.6
  188.     children [
  189.         em7_RoundedColumnSeries {
  190.             appearance Blue { }
  191.             xDimension 5
  192.             xSpacing 3
  193.             width 0.4
  194.             depth 0.8
  195.             height [1.463, 0.56, 1.252, 1.856, 3.614 ]
  196.         }
  197.     ]
  198. }
  199.  
  200. Transform {
  201.     translation 1.5 0 1.1
  202.     children [
  203.         em7_RoundedRibbonSeries {
  204.             appearance SurfaceColor { }
  205.             xDimension 5
  206.             xSpacing 3
  207.             depth 1
  208.             thickness 0.2
  209.             height [ 0.1, 0.121, 0.408, 1.249, 6.866 ]
  210.         },
  211.         em7_PopupStrip {
  212.             xDimension 5
  213.             xSpacing 3
  214.             radius 0.5
  215.             depth 1.5
  216.             transparency 1
  217.             popupHeight 0.65
  218.             height [ 0.1, 0.121, 0.408, 1.249, 6.866 ]
  219.             popupText ["0", "2,428", "34,357", "127,919", "752,825"]
  220.         }
  221.     ]
  222. }
  223.  
  224. Anchor {
  225.     url "ProdBOverview.wrl"
  226.     description "Back to the overview"
  227.     children [
  228.         Transform {
  229.             translation 15 0.25 2
  230.             children [
  231.                 Shape {
  232.                     appearance Appearance {
  233.                         material Material {
  234.                             diffuseColor 1 1 0.4
  235.                         }
  236.                     }                    
  237.                     geometry Cone {
  238.                         bottomRadius 0.2
  239.                         height 0.5
  240.                     }
  241.                 }
  242.             ]
  243.         }
  244.     ]
  245. }
  246.  
  247. # custom lighting
  248.  
  249. DEF LIGHT1 PointLight {
  250.     location 55 30 13
  251.     intensity 0.6
  252.     ambientIntensity 0.5
  253. }
  254.  
  255. DEF LIGHT2 PointLight {
  256.     location 13 20 55
  257.     intensity 0.5
  258.     ambientIntensity 0.5
  259. }
  260.  
  261. DEF LIGHT3 PointLight {
  262.     location 0 0 60
  263.     intensity 0.4
  264.     ambientIntensity 0.5
  265. }
  266.  
  267.  
  268. Transform {
  269.     translation 14 0 4.5
  270.     rotation -2.02099 2.02099 2.021 2.094399
  271.     children [
  272.         em7_TextList {
  273.             string ["1",
  274.                 "2",
  275.                 "3",
  276.                 "4",
  277.                 "5"
  278.             ]
  279.             visibleCount 5
  280.             textHeight 1
  281.             textGap 2
  282.             family "SANS"
  283.             justify ["END", "END"]
  284.         }
  285.     ]
  286. }
  287.     
  288. Transform {
  289.     translation 7.5 8 0
  290.     children [
  291.         Shape {
  292.             geometry Text {
  293.                 string "Product B Details"
  294.                 fontStyle FontStyle {
  295.                     justify "MIDDLE"
  296.                     family "SANS"
  297.                     size 0.9
  298.                 }
  299.             }
  300.         }
  301.     ]
  302. }
  303.  
  304. Transform {
  305.     translation 7.5 7.25 0
  306.     children [
  307.         Shape {
  308.             geometry Text {
  309.                 string "(Aug 96 - Jan 97)"
  310.                 fontStyle FontStyle {
  311.                     justify "MIDDLE"
  312.                     family "SANS"
  313.                     size 0.6
  314.                 }
  315.             }
  316.         }
  317.     ]
  318. }
  319.  
  320. Transform {
  321.     translation 16 1 0
  322.     children [
  323.         em7_Legend {
  324.             appearances [
  325.                 Red {}
  326.                 Blue {}
  327.                 SurfaceColor {}
  328.             ]
  329.             textHeight 0.6
  330.             textGap 0.4
  331.             descriptions ["Calls", "Samples", "Industry Average"]
  332.         }
  333.     ]
  334. }
  335.  
  336.  
  337. ROUTE LOOKAT.orientation_changed TO VIEW.set_orientation
  338.